home *** CD-ROM | disk | FTP | other *** search
/ ROM Magic / ROM Magic.iso / pc / 12_dorei / winprog / ship.dxr / 00046.ls < prev    next >
Encoding:
Text File  |  1995-05-12  |  742 b   |  33 lines
  1. on soundonoff onoff
  2.   global soundstatus
  3.   if onoff = "on" then
  4.     set the soundEnabled to 1
  5.   else
  6.     if onoff = "off" then
  7.       set the soundEnabled to 0
  8.     end if
  9.   end if
  10.   if soundstatus then
  11.     set soundstatus to 0
  12.     set the castNum of sprite 18 to the number of cast "soundOff,up"
  13.     set the locH of sprite 18 to 248
  14.     set the locV of sprite 18 to 440
  15.   else
  16.     set soundstatus to 1
  17.     set the castNum of sprite 18 to the number of cast "soundOn,up"
  18.     set the locH of sprite 18 to 248
  19.     set the locV of sprite 18 to 440
  20.   end if
  21.   updateStage()
  22. end
  23.  
  24. on eracemenudownbutton
  25.   global poponoff
  26.   set poponoff to 0
  27.   puppetSprite(20, 0)
  28.   puppetSprite(21, 0)
  29.   puppetSprite(22, 0)
  30.   puppetSprite(23, 0)
  31.   updateStage()
  32. end
  33.